home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / batch / makepoll.zip / MAKEPOLX.BAT < prev   
DOS Batch File  |  1990-09-13  |  2KB  |  46 lines
  1. ::
  2. :: MAKEPOLX.BAT - Stan Bimson - 09/13/90 - 1:116/32
  3. :: - Example batch file to poll your neighbors, Menu driven
  4. :: - Can be assigned to a FKey in your Binkley.Bat
  5. :: - Or can be called from outside Binkley at the command prompt
  6. ::
  7. :: - This version doesn't require ANSI.SYS be loaded
  8. :: - Uses Norton Utilities program ASK to get user's input
  9. ::     If you don't have ASK there are several shareware programs
  10. ::     do the same or similar operations.
  11. :: - You also have to have the great utility PLEASE
  12. ::
  13. :: - Additional information: I have modified my COMMAND.COM so
  14. ::     1) put this line at the start of this batch file
  15. ::             @echo off       rem for DOS 3.3+
  16. ::             echo off        rem DOS lower than 3.3
  17. ::     2) every place I just have echo<sp><sp> put
  18. ::             echo<sp><atl255> which looks like:
  19. ::             echo  
  20. ::
  21. :rerun
  22. ::     -------------- do menu screen --------------
  23. cls
  24. echo  
  25. echo   Make a poll (ESC when done) for the following:
  26. echo  
  27. echo Jack Smith  - The Programmer's Corner - 1:116/4000
  28. echo  
  29. echo Marge Clark -      The Homestead      - 1:116/3000
  30. echo  
  31. echo Kevin       -      The Dawg Byte      - 1:116/29
  32. echo  
  33. ::     -------------- get user's input --------------
  34. :: Errorlevel returned codes -> 1234 for menu choices
  35. c:\dos\ask  "Enter choice : ",  jmk
  36. ::     -------------- test errorlevels --------------
  37. if errorlevel 4 goto eof
  38. if errorlevel 3 c:\bink\util\please poll 116/29 now
  39. if errorlevel 2 c:\bink\util\please poll 116/3000 now
  40. if errorlevel 1 c:\bink\util\please poll 116/4000 now
  41. goto rerun
  42. :eof
  43. echo  
  44. echo  
  45.  
  46.